home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2000 October
/
CHIP Turkiye Ekim 2000.iso
/
prog
/
share
/
39
/
_SETUP.1
/
Qimage.exe
/
0
/
RCDATA
/
TFORM6
/
TFORM6.txt
Wrap
Text File
|
2000-07-30
|
22KB
|
668 lines
object Form6: TForm6
Left = 334
Top = 66
Width = 790
Height = 590
Caption = 'Full Page Editor'
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
OldCreateOrder = True
OnClose = FormClose
OnDeactivate = FormDeactivate
OnMouseMove = FormMouseMove
OnResize = FormResize
PixelsPerInch = 120
TextHeight = 16
object Label1: TLabel
Left = 10
Top = 507
Width = 4
Height = 16
Visible = False
end
object Label13: TLabel
Left = 10
Top = 532
Width = 484
Height = 16
Caption =
'Manual placement of selected image: drag center to move, lower r' +
'ight corner to size'
end
object PMultiImage1: TPMultiImage
Left = 10
Top = 10
Width = 492
Height = 492
Hint =
'Drag image(s) using the upper left corner to place them at any l' +
'ocation. Drag images using the lower right corner to resize. R' +
'ight click on image for a list of options.'
GrabHandCursor = 5
Scrolling = True
ShowScrollbars = True
B_W_CopyFlags = [C_DEL]
Color = clBtnFace
ImageName = 'file not found'
ImageReadRes = lAutoMatic
BlitMode = sLight
ImageWriteRes = sAutoMatic
TifSaveCompress = sNONE
TiffPage = 0
TiffAppend = False
JPegSaveQuality = 25
JPegSaveSmooth = 5
OnMouseDown = PMultiImage1MouseDown
OnMouseMove = PMultiImage1MouseMove
OnMouseUp = PMultiImage1MouseUp
RubberBandBtn = mbLeft
ScrollbarWidth = 12
ParentColor = True
ParentShowHint = False
PopupMenu = PopupMenu1
ShowHint = False
Stretch = True
TextLeft = 0
TextTop = 0
TextRotate = 0
TabOrder = 3
TabStop = False
ZoomBy = 10
end
object GroupBox2: TGroupBox
Left = 512
Top = 10
Width = 257
Height = 250
Caption = 'Image'
TabOrder = 0
object Label2: TLabel
Left = 10
Top = 20
Width = 63
Height = 16
Caption = 'File Name:'
end
object Label3: TLabel
Left = 5
Top = 39
Width = 65
Height = 16
Caption = 'Resolution:'
end
object Label4: TLabel
Left = 25
Top = 59
Width = 49
Height = 16
Caption = 'Created:'
end
object Label12: TLabel
Left = 32
Top = 231
Width = 198
Height = 16
Caption = 'Lt click=select, Rt click=options'
Font.Charset = ANSI_CHARSET
Font.Color = clGreen
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label14: TLabel
Left = 111
Top = 187
Width = 25
Height = 16
Caption = '0.00'
end
object Label15: TLabel
Left = 111
Top = 217
Width = 25
Height = 16
Caption = '0.00'
end
object Label16: TLabel
Left = 62
Top = 203
Width = 25
Height = 16
Caption = '0.00'
end
object Label17: TLabel
Left = 160
Top = 203
Width = 25
Height = 16
Caption = '0.00'
end
object Label18: TLabel
Left = 5
Top = 187
Width = 49
Height = 16
Caption = 'Location'
end
object GroupBox1: TGroupBox
Left = 5
Top = 76
Width = 247
Height = 112
Caption = 'Actual Print Size (in)'
TabOrder = 1
object Label7: TLabel
Left = 69
Top = 59
Width = 100
Height = 16
Caption = 'Apply Change to:'
end
object Label5: TLabel
Left = 79
Top = 34
Width = 7
Height = 16
Caption = 'x'
end
object BitBtn3: TBitBtn
Left = 15
Top = 79
Width = 99
Height = 27
Hint = 'Apply the above bounds to ONLY the currently selected image.'
Caption = 'Selected'
ParentShowHint = False
ShowHint = True
TabOrder = 3
OnClick = BitBtn3Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
555555555555555555555555555555555555555555FF55555555555559055555
55555555577FF5555555555599905555555555557777F5555555555599905555
555555557777FF5555555559999905555555555777777F555555559999990555
5555557777777FF5555557990599905555555777757777F55555790555599055
55557775555777FF5555555555599905555555555557777F5555555555559905
555555555555777FF5555555555559905555555555555777FF55555555555579
05555555555555777FF5555555555557905555555555555777FF555555555555
5990555555555555577755555555555555555555555555555555}
NumGlyphs = 2
end
object BitBtn4: TBitBtn
Left = 133
Top = 79
Width = 100
Height = 27
Hint = 'Apply the above bounds to ALL images in the queue.'
Caption = 'All'
ParentShowHint = False
ShowHint = True
TabOrder = 4
OnClick = BitBtn4Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
3333333777333777FF33339993707399933333773337F3777FF3399933000339
9933377333777F3377F3399333707333993337733337333337FF993333333333
399377F33333F333377F993333303333399377F33337FF333373993333707333
333377F333777F333333993333101333333377F333777F3FFFFF993333000399
999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
99933773FF777F3F777F339993707399999333773F373F77777F333999999999
3393333777333777337333333999993333333333377777333333}
NumGlyphs = 2
end
object Edit1: TEdit
Left = 10
Top = 25
Width = 60
Height = 24
Hint =
'Enter the horizontal print bound (maximum horizontal print size)' +
'. You may enter the horizontal measurement or the number of pri' +
'nts to fit across the paper (ex: enter 2x for two prints across,' +
' etc). '
ParentShowHint = False
ShowHint = True
TabOrder = 0
end
object BitBtn9: TBitBtn
Left = 167
Top = 25
Width = 71
Height = 27
Hint =
'Swap horizontal/vertical bounds. Use this button to rotate rect' +
'angular (non-square) images 90 degrees CCW for better fit on the' +
' page. "For best fit, rotate:" must be set to "Image" on the ma' +
'in screen to have this affect.'
Caption = 'Swap'
ParentShowHint = False
ShowHint = True
TabOrder = 2
OnClick = BitBtn9Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333333333333333333333333333333333333333333333FF333333333333
3000333333FFFFF3F77733333000003000B033333777773777F733330BFBFB00
E00033337FFF3377F7773333000FBFB0E000333377733337F7773330FBFBFBF0
E00033F7FFFF3337F7773000000FBFB0E000377777733337F7770BFBFBFBFBF0
E00073FFFFFFFF37F777300000000FB0E000377777777337F7773333330BFB00
000033333373FF77777733333330003333333333333777333333333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
end
object Edit2: TEdit
Left = 98
Top = 25
Width = 61
Height = 24
Hint =
'Enter the vertical print bound (maximum vertical print size). Y' +
'ou may enter the vertical measurement or the number of prints to' +
' fit down the paper (ex: enter 2x for two prints down, etc). '
ParentShowHint = False
ShowHint = True
TabOrder = 1
end
end
object BitBtn5: TBitBtn
Left = 165
Top = 49
Width = 86
Height = 27
Hint = 'Click to view detailed image information'
Caption = 'Details'
ParentShowHint = False
ShowHint = True
TabOrder = 0
OnClick = BitBtn5Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
555555FFFFFFFFFF55555000000000055555577777777775FFFF00B8B8B8B8B0
0000775F5555555777770B0B8B8B8B8B0FF07F75F555555575F70FB0B8B8B8B8
B0F07F575FFFFFFFF7F70BFB0000000000F07F557777777777570FBFBF0FFFFF
FFF07F55557F5FFFFFF70BFBFB0F000000F07F55557F777777570FBFBF0FFFFF
FFF075F5557F5FFFFFF750FBFB0F000000F0575FFF7F777777575700000FFFFF
FFF05577777F5FF55FF75555550F00FF00005555557F775577775555550FFFFF
0F055555557F55557F755555550FFFFF00555555557FFFFF7755555555000000
0555555555777777755555555555555555555555555555555555}
NumGlyphs = 2
end
end
object GroupBox3: TGroupBox
Left = 512
Top = 260
Width = 257
Height = 73
Caption = 'Page'
TabOrder = 1
object Label10: TLabel
Left = 6
Top = 53
Width = 36
Height = 16
Caption = 'Go to:'
end
object ComboBox2: TComboBox
Left = 49
Top = 45
Width = 61
Height = 24
Hint = 'Click on any page number to go directly to that page.'
ItemHeight = 16
ParentShowHint = False
ShowHint = True
TabOrder = 0
Text = '1'
OnChange = ComboBox2Change
end
object BitBtn10: TBitBtn
Left = 128
Top = 16
Width = 119
Height = 27
Hint = 'Print only the current page displayed at left'
Caption = 'Print Page'
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnClick = BitBtn10Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
0003377777777777777308888888888888807F33333333333337088888888888
88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
NumGlyphs = 2
end
object BitBtn7: TBitBtn
Left = 128
Top = 45
Width = 119
Height = 25
Hint = 'Save the current page as an image file'
Caption = 'Save Page'
ParentShowHint = False
ShowHint = True
TabOrder = 2
OnClick = BitBtn7Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
7700333333337777777733333333008088003333333377F73377333333330088
88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
93337FFFF7737777733300000033333333337777773333333333}
NumGlyphs = 2
end
end
object GroupBox4: TGroupBox
Left = 512
Top = 333
Width = 257
Height = 99
Caption = 'Document'
TabOrder = 2
object Label9: TLabel
Left = 12
Top = 26
Width = 101
Height = 16
Caption = 'Page Orientation:'
end
object Label11: TLabel
Left = 6
Top = 54
Width = 107
Height = 16
Caption = 'Image Positioning:'
end
object ComboBox3: TComboBox
Left = 138
Top = 15
Width = 109
Height = 24
Hint =
'Select portrait if images are to be printed on the paper normall' +
'y. Select landscape to rotate the paper 90 degrees.'
ItemHeight = 16
Items.Strings = (
'Portrait'
'Landscape')
ParentShowHint = False
ShowHint = True
TabOrder = 0
Text = 'Portrait'
OnChange = ComboBox3Change
end
object ComboBox5: TComboBox
Left = 138
Top = 44
Width = 109
Height = 24
Hint =
'Manual - one image per page at specified location. Compact - mi' +
'nimizes paper coverage by clustering in upper left. Center - sp' +
'ace as far apart as possible and center on page. Template - mat' +
'ch sample on main screen. Optimize - rearrange print order.'
ItemHeight = 16
Items.Strings = (
'Center'
'Compact'
'Template'
'Optimize'
'Manual'
'Freehand')
ParentShowHint = False
ShowHint = True
TabOrder = 1
Text = 'Center'
OnChange = ComboBox5Change
end
object CheckBox1: TCheckBox
Left = 20
Top = 76
Width = 227
Height = 21
Hint =
'Check this box to print the file name, image size, and file date' +
' below each image on the printed page.'
Caption = 'Print image/file information'
ParentShowHint = False
ShowHint = True
TabOrder = 2
OnClick = CheckBox1Click
end
end
object GroupBox5: TGroupBox
Left = 512
Top = 431
Width = 257
Height = 120
Caption = 'Editor'
TabOrder = 4
object Label8: TLabel
Left = 9
Top = 27
Width = 32
Height = 16
Caption = 'View:'
end
object ComboBox1: TComboBox
Left = 49
Top = 20
Width = 159
Height = 24
Hint =
'Select "Templates Only" to show only the image name, location, a' +
'nd orientation (upright arrow). "Selected Image" displays one i' +
'mage at a time. "Thumbs/Small Images" displays only fast-loadin' +
'g images. "All Images" displays all images on the page.'
ItemHeight = 16
Items.Strings = (
'Templates Only'
'Selected Image'
'Thumbs/Small Images'
'All Images')
ParentShowHint = False
ShowHint = True
TabOrder = 0
Text = 'Templates Only'
OnChange = ComboBox1Change
OnKeyDown = ComboBox1KeyDown
end
object BitBtn1: TBitBtn
Left = 9
Top = 53
Width = 119
Height = 27
Hint = 'Previous printed page.'
Caption = 'Prev Pg'
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnClick = BitBtn1Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000333
3333333333777F33333333333309033333333333337F7F333333333333090333
33333333337F7F33333333333309033333333333337F7F333333333333090333
33333333337F7F33333333333309033333333333FF7F7FFFF333333000090000
3333333777737777F333333099999990333333373F3333373333333309999903
333333337F33337F33333333099999033333333373F333733333333330999033
3333333337F337F3333333333099903333333333373F37333333333333090333
33333333337F7F33333333333309033333333333337373333333333333303333
333333333337F333333333333330333333333333333733333333}
NumGlyphs = 2
end
object BitBtn2: TBitBtn
Left = 129
Top = 53
Width = 120
Height = 27
Hint = 'Next printed page.'
Caption = 'Next Pg'
ParentShowHint = False
ShowHint = True
TabOrder = 2
OnClick = BitBtn2Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
333333333337F33333333333333033333333333333373F333333333333090333
33333333337F7F33333333333309033333333333337373F33333333330999033
3333333337F337F33333333330999033333333333733373F3333333309999903
333333337F33337F33333333099999033333333373333373F333333099999990
33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
33333333337F7F33333333333309033333333333337F7F333333333333090333
33333333337F7F33333333333309033333333333337F7F333333333333090333
33333333337F7F33333333333300033333333333337773333333}
NumGlyphs = 2
end
object BitBtn8: TBitBtn
Left = 9
Top = 82
Width = 119
Height = 28
Hint =
'Click only once. Loading will stop after the current image fini' +
'shes loading.'
Caption = 'Stop Loading'
ParentShowHint = False
ShowHint = True
TabOrder = 3
Visible = False
OnClick = BitBtn8Click
end
object BitBtn6: TBitBtn
Left = 129
Top = 82
Width = 120
Height = 28
Caption = 'Done'
TabOrder = 4
OnClick = BitBtn6Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000001000000010000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
03333377777777777F333301111111110333337F333333337F33330111111111
0333337F333333337F333301111111110333337F333333337F33330111111111
0333337F333333337F333301111111110333337F333333337F33330111111111
0333337F3333333F7F333301111111B10333337F333333737F33330111111111
0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
0333337F377777337F333301111111110333337F333333337F33330111111111
0333337FFFFFFFFF7F3333000000000003333377777777777333}
NumGlyphs = 2
end
end
object PopupMenu1: TPopupMenu
OnPopup = PopupMenu1Popup
Left = 384
Top = 408
object Increasesize1: TMenuItem
Caption = 'LARGER'
Hint = 'Increase the horizontal and vertical bounds by 25%'
ShortCut = 16460
OnClick = Increasesize1Click
end
object Decreasesize1: TMenuItem
Caption = 'SMALLER'
Hint = 'Decrease the horizontal and vertical bounds by 25%'
ShortCut = 16467
OnClick = Decreasesize1Click
end
object ROTATE90degrees1: TMenuItem
Caption = 'ROTATE 90 degrees'
Hint = 'Rotate selected image 90 degrees'
ShortCut = 16466
OnClick = ROTATE90degrees1Click
end
object Pushtonextpage1: TMenuItem
Caption = 'PUSH to next page'
Hint =
'Insert a page break on the current image, pushing it to the next' +
' page'
ShortCut = 16464
OnClick = Pushtonextpage1Click
end
object Viewfullscreen1: TMenuItem
Caption = 'VIEW full screen'
Hint = 'View the selected image in full screen mode'
OnClick = Viewfullscreen1Click
end
object Copytoclipboard1: TMenuItem
Caption = 'COPY to clipboard'
Hint = 'Copy the selected image to the Qimage clipboard'
ShortCut = 16451
OnClick = Copytoclipboard1Click
end
object Cuttoclipboard1: TMenuItem
Caption = 'CUT to clipboard'
Hint = 'Remove the selected image and place onto the Qimage clipboard'
ShortCut = 16472
OnClick = Cuttoclipboard1Click
end
object Pastefromclipboard1: TMenuItem
Caption = 'PASTE before'
Hint =
'Paste the image in the Qimage clipboard in front of the selected' +
' image'
ShortCut = 16469
OnClick = Pastefromclipboard1Click
end
object Pasteafter1: TMenuItem
Caption = 'PASTE after'
ShortCut = 16470
OnClick = Pasteafter1Click
end
object EditANNOTATION1: TMenuItem
Caption = 'TEXT annotation'
ShortCut = 16468
OnClick = EditANNOTATION1Click
end
object BATCHFilter1: TMenuItem
Caption = 'FILTER (cutout, enhance, etc)'
ShortCut = 16454
OnClick = BATCHFilter1Click
end
end
end
